clear all;
clc;

s = 100;
load mnist_train;
load mnist_test;
[VV,~,~] = svd([xL,xU]',0);
clear xL;
clear xU;
l = size(yL,2);
n = l+size(yU,2);
V = VV(:,1:s);
clear VV;

[Yp,numsv] = mmkp(V,yL',1);

trerr = calerr(Yp(1:l),yL')
tserr = calerr(Yp(l+1:n),yU')

save('res/linlin','trerr','tserr','numsv');
